inherited frmCadPedido: TfrmCadPedido
  Left = 305
  Width = 644
  Height = 747
  AutoScroll = True
  Caption = 'Cadastro de Pedidos'
  Font.Name = 'Verdana'
  OldCreateOrder = True
  OnCloseQuery = FormCloseQuery
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 662
    Width = 628
    Height = 47
    inherited btnIncluir: TSpeedButton
      Left = 750
      Top = 36
      Visible = False
    end
    inherited btnExcluir: TSpeedButton
      Left = 868
      Top = 36
      Visible = False
    end
    inherited btnEditar: TSpeedButton
      Left = 809
      Top = 36
      Visible = False
    end
    inherited Bevel2: TBevel
      Top = 78
      Visible = False
    end
    inherited btnGravar: TSpeedButton
      Left = 3
      Top = 5
    end
    inherited btnCancelar: TSpeedButton
      Left = 62
      Top = 5
    end
    inherited Bevel3: TBevel
      Left = 566
    end
    inherited btnFechar: TSpeedButton
      Left = 570
    end
    inherited Bevel1: TBevel
      Left = 341
      Top = 67
      Visible = False
    end
  end
  inherited Panel4: TPanel
    Width = 628
    Height = 662
    object GroupBox2: TGroupBox
      Left = 2
      Top = 2
      Width = 624
      Height = 200
      Align = alTop
      Caption = 'Identifica'#231#227'o do Pedido'
      Font.Charset = ANSI_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      object Label5: TLabel
        Left = 11
        Top = 25
        Width = 43
        Height = 13
        Caption = 'Pedido:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 11
        Top = 52
        Width = 78
        Height = 13
        Caption = 'Raz'#227'o Social:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 12
        Top = 75
        Width = 43
        Height = 13
        Caption = 'Marca: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label8: TLabel
        Left = 13
        Top = 99
        Width = 92
        Height = 13
        Caption = 'Representante: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label9: TLabel
        Left = 13
        Top = 124
        Width = 144
        Height = 13
        Caption = 'Condi'#231#227'o de pagamento:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lblCodigoPedido: TLabel
        Left = 77
        Top = 25
        Width = 106
        Height = 14
        Caption = 'lblCodigoPedido'
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -12
        Font.Name = 'Verdana'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label10: TLabel
        Left = 436
        Top = 26
        Width = 78
        Height = 13
        Caption = 'Data Pedido: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lblDataPedido: TLabel
        Left = 517
        Top = 26
        Width = 80
        Height = 13
        Caption = '00/00/0000'
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label11: TLabel
        Left = 14
        Top = 174
        Width = 98
        Height = 13
        Caption = 'Data de Entrega:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lblStatusPedido: TLabel
        Left = 313
        Top = 17
        Width = 4
        Height = 14
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = 'Verdana'
        Font.Style = [fsBold]
        ParentFont = False
        Visible = False
      end
      object Label26: TLabel
        Left = 223
        Top = 176
        Width = 163
        Height = 13
        Caption = 'N'#250'mero do Tal'#227'o de Pedido:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label27: TLabel
        Left = 13
        Top = 149
        Width = 69
        Height = 13
        Caption = 'Modalidade:'
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object DBLookupComboBox4: TDBLookupComboBox
        Left = 119
        Top = 48
        Width = 396
        Height = 19
        Ctl3D = False
        DataField = 'cd_cliente'
        DataSource = DS_Padrao
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_cliente'
        ListField = 'razao'
        ListSource = DS_Cliente
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 0
        OnClick = DBLookupComboBox4Click
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox5: TDBLookupComboBox
        Left = 119
        Top = 72
        Width = 396
        Height = 19
        Ctl3D = False
        DataField = 'cd_marca'
        DataSource = DS_Padrao
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_marca'
        ListField = 'descricao'
        ListSource = DS_Marca
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 1
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox5Exit
      end
      object DBLookupComboBox6: TDBLookupComboBox
        Left = 119
        Top = 96
        Width = 396
        Height = 19
        Ctl3D = False
        DataField = 'cd_representante'
        DataSource = DS_Padrao
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_representante'
        ListField = 'nome'
        ListSource = DS_Representante
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 2
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox7: TDBLookupComboBox
        Left = 172
        Top = 120
        Width = 343
        Height = 19
        Ctl3D = False
        DataField = 'cd_condpagamento'
        DataSource = DS_Padrao
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_condicaopagamento'
        ListField = 'descricao'
        ListSource = DS_CondPagamento
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 3
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object dbedtdt_entrega: TDBEdit
        Left = 119
        Top = 172
        Width = 99
        Height = 19
        Ctl3D = False
        DataField = 'dt_entrega'
        DataSource = DS_Padrao
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 5
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBEdit10: TDBEdit
        Left = 391
        Top = 172
        Width = 125
        Height = 19
        Ctl3D = False
        DataField = 'ds_talao_pedido'
        DataSource = DS_Padrao
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 6
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox12: TDBLookupComboBox
        Left = 119
        Top = 145
        Width = 396
        Height = 19
        Ctl3D = False
        DataField = 'cd_modalidade'
        DataSource = DS_Padrao
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_modalidade'
        ListField = 'ds_modalidade'
        ListSource = DS_Modalidade
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 4
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
    end
    object GroupBox3: TGroupBox
      Left = 2
      Top = 202
      Width = 624
      Height = 39
      Align = alTop
      Caption = 'Resumo do Pedido'
      Font.Charset = ANSI_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      object Label1: TLabel
        Left = 63
        Top = 18
        Width = 119
        Height = 13
        Caption = 'Quantidade Total: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblQuantTotal: TLabel
        Left = 185
        Top = 18
        Width = 32
        Height = 14
        Caption = '0000'
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -12
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 342
        Top = 19
        Width = 79
        Height = 13
        Caption = 'Valor Total: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblValorTotal: TLabel
        Left = 433
        Top = 19
        Width = 52
        Height = 14
        Caption = '0000,00'
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -12
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
    end
    object GroupBox4: TGroupBox
      Left = 2
      Top = 241
      Width = 624
      Height = 325
      Align = alTop
      Caption = 'Identifica'#231#227'o dos produtos'
      Font.Charset = ANSI_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      object Label13: TLabel
        Left = 15
        Top = 73
        Width = 65
        Height = 13
        Caption = 'Material 1: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label15: TLabel
        Left = 18
        Top = 244
        Width = 74
        Height = 13
        Caption = 'Quantidade: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label16: TLabel
        Left = 191
        Top = 244
        Width = 75
        Height = 13
        Caption = 'Valor Innovi:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 15
        Top = 21
        Width = 53
        Height = 13
        Caption = 'Produto: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label18: TLabel
        Left = 406
        Top = 74
        Width = 26
        Height = 13
        Caption = 'Cor:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 15
        Top = 93
        Width = 65
        Height = 13
        Caption = 'Material 2: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label14: TLabel
        Left = 15
        Top = 113
        Width = 65
        Height = 13
        Caption = 'Material 3: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label17: TLabel
        Left = 15
        Top = 133
        Width = 65
        Height = 13
        Caption = 'Material 4: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label21: TLabel
        Left = 15
        Top = 153
        Width = 65
        Height = 13
        Caption = 'Material 5: '
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label19: TLabel
        Left = 406
        Top = 94
        Width = 26
        Height = 13
        Caption = 'Cor:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label20: TLabel
        Left = 406
        Top = 114
        Width = 26
        Height = 13
        Caption = 'Cor:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label22: TLabel
        Left = 406
        Top = 153
        Width = 26
        Height = 13
        Caption = 'Cor:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label23: TLabel
        Left = 406
        Top = 133
        Width = 26
        Height = 13
        Caption = 'Cor:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label24: TLabel
        Left = 115
        Top = 219
        Width = 82
        Height = 13
        Caption = 'Cor Espumex:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label25: TLabel
        Left = 18
        Top = 263
        Width = 73
        Height = 13
        Caption = 'Observa'#231#227'o:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lblTamanho: TLabel
        Left = 16
        Top = 49
        Width = 58
        Height = 13
        Caption = 'Tamanho:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label29: TLabel
        Left = 315
        Top = 195
        Width = 118
        Height = 13
        Caption = 'Desconto Comiss'#227'o:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lbl1: TLabel
        Left = 388
        Top = 244
        Width = 122
        Height = 13
        Caption = 'Valor Representante:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lbl2: TLabel
        Left = 346
        Top = 219
        Width = 69
        Height = 13
        Caption = 'Cor Relevo:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lbl3: TLabel
        Left = 218
        Top = 49
        Width = 49
        Height = 13
        Caption = 'Largura:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lbl4: TLabel
        Left = 414
        Top = 49
        Width = 83
        Height = 13
        Caption = 'Comprimento:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object lbl5: TLabel
        Left = 84
        Top = 195
        Width = 65
        Height = 13
        Caption = 'Tipo Corte:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object Label12: TLabel
        Left = 406
        Top = 173
        Width = 26
        Height = 13
        Caption = 'Cor:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
      end
      object DBLookupComboBox2: TDBLookupComboBox
        Left = 83
        Top = 71
        Width = 282
        Height = 19
        Ctl3D = False
        DataField = 'cd_material1'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_material'
        ListField = 'descricao'
        ListSource = DS_ProdutoMaterial
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 4
        OnClick = DBLookupComboBox2Click
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 83
        Top = 21
        Width = 536
        Height = 19
        Ctl3D = False
        DataField = 'cd_produto'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_produto'
        ListField = 'descricao'
        ListSource = DS_Produto
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 0
        OnClick = DBLookupComboBox1Click
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBEdit4: TDBEdit
        Left = 443
        Top = 72
        Width = 177
        Height = 19
        Color = clWhite
        Ctl3D = False
        DataField = 'cor_silk1'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 5
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBCheckBox1: TDBCheckBox
        Left = 18
        Top = 194
        Width = 58
        Height = 17
        Caption = 'Relevo'
        DataField = 'sn_relevo'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        TabOrder = 14
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        OnClick = DBCheckBox1Click
      end
      object DBLookupComboBox3: TDBLookupComboBox
        Left = 83
        Top = 91
        Width = 282
        Height = 19
        Ctl3D = False
        DataField = 'cd_material2'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_material'
        ListField = 'descricao'
        ListSource = DS_ProdutoMaterial
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 6
        OnClick = DBLookupComboBox3Click
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox8: TDBLookupComboBox
        Left = 83
        Top = 111
        Width = 282
        Height = 19
        Ctl3D = False
        DataField = 'cd_material3'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_material'
        ListField = 'descricao'
        ListSource = DS_ProdutoMaterial
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 8
        OnClick = DBLookupComboBox8Click
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox9: TDBLookupComboBox
        Left = 83
        Top = 131
        Width = 282
        Height = 19
        Ctl3D = False
        DataField = 'cd_material4'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_material'
        ListField = 'descricao'
        ListSource = DS_ProdutoMaterial
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 10
        OnClick = DBLookupComboBox9Click
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox10: TDBLookupComboBox
        Left = 83
        Top = 151
        Width = 282
        Height = 19
        Ctl3D = False
        DataField = 'cd_material5'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_material'
        ListField = 'descricao'
        ListSource = DS_ProdutoMaterial
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 12
        OnClick = DBLookupComboBox10Click
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBEdit1: TDBEdit
        Left = 443
        Top = 92
        Width = 177
        Height = 19
        Ctl3D = False
        DataField = 'cor_silk2'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 7
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBEdit3: TDBEdit
        Left = 443
        Top = 112
        Width = 177
        Height = 19
        Ctl3D = False
        DataField = 'cor_silk3'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 9
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBEdit5: TDBEdit
        Left = 443
        Top = 152
        Width = 177
        Height = 19
        Ctl3D = False
        DataField = 'cor_silk5'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 13
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBEdit8: TDBEdit
        Left = 443
        Top = 132
        Width = 177
        Height = 19
        Ctl3D = False
        DataField = 'cor_silk4'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 11
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBLookupComboBox11: TDBLookupComboBox
        Left = 206
        Top = 217
        Width = 130
        Height = 19
        Ctl3D = False
        DataField = 'cd_cor_espumex'
        DataSource = DS_ProdutoPedido
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_cor_espumex'
        ListField = 'ds_cor_espumex'
        ListSource = DS_Cor_Espumex
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 18
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object Edit1: TEdit
        Left = 95
        Top = 241
        Width = 89
        Height = 19
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 20
        OnExit = Edit1Exit
        OnKeyPress = Edit1KeyPress
      end
      object Edit2: TEdit
        Left = 276
        Top = 241
        Width = 91
        Height = 19
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 21
        OnKeyPress = Edit2KeyPress
      end
      object DBLookupComboBox14: TDBLookupComboBox
        Left = 444
        Top = 193
        Width = 176
        Height = 19
        Ctl3D = False
        DataField = 'cd_desconto'
        DataSource = DS_ProdutoPedido
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_desconto'
        ListField = 'descricao'
        ListSource = DS_Desconto
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 16
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object DBEdit6: TDBEdit
        Left = 83
        Top = 47
        Width = 114
        Height = 19
        Ctl3D = False
        DataField = 'ds_tamanho_produto'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 1
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object Edit3: TEdit
        Left = 528
        Top = 241
        Width = 93
        Height = 19
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 22
        OnKeyPress = Edit2KeyPress
      end
      object dbedtds_cor_relevo: TDBEdit
        Left = 424
        Top = 217
        Width = 195
        Height = 19
        Ctl3D = False
        DataField = 'ds_cor_relevo'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 19
        OnEnter = DBLookupComboBox4Enter
        OnExit = dbedtds_cor_relevoExit
      end
      object dbmmoobs: TDBMemo
        Left = 96
        Top = 264
        Width = 526
        Height = 58
        Ctl3D = False
        DataField = 'obs'
        DataSource = DS_ProdutoPedido
        ParentCtl3D = False
        TabOrder = 23
        OnEnter = dbmmoobsEnter
        OnExit = dbmmoobsExit
      end
      object dbedtds_tamanho_produto: TDBEdit
        Left = 285
        Top = 47
        Width = 114
        Height = 19
        Ctl3D = False
        DataField = 'ds_largura'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 2
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object dbedtds_tamanho_produto1: TDBEdit
        Left = 505
        Top = 47
        Width = 114
        Height = 19
        Ctl3D = False
        DataField = 'ds_comprimento'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 3
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object dblcd_desconto: TDBLookupComboBox
        Left = 156
        Top = 193
        Width = 147
        Height = 19
        Ctl3D = False
        DataField = 'cd_tipo_corte'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        KeyField = 'cd_tipo_corte'
        ListField = 'ds_tipo_corte'
        ListSource = DS_TipoCorte
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 15
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
      object dbchksn_relevo: TDBCheckBox
        Left = 18
        Top = 218
        Width = 87
        Height = 17
        Caption = 'Repeti'#231#227'o'
        DataField = 'sn_repeticao'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentFont = False
        TabOrder = 17
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        OnClick = DBCheckBox1Click
      end
      object DBEdit2: TDBEdit
        Left = 443
        Top = 172
        Width = 177
        Height = 19
        Ctl3D = False
        DataField = 'cor_silk6'
        DataSource = DS_ProdutoPedido
        Font.Charset = ANSI_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Verdana'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 24
        OnEnter = DBLookupComboBox4Enter
        OnExit = DBLookupComboBox4Exit
      end
    end
    object Panel2: TPanel
      Left = 2
      Top = 566
      Width = 624
      Height = 94
      Align = alClient
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 3
      object Panel3: TPanel
        Left = 556
        Top = 2
        Width = 66
        Height = 90
        Align = alRight
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object btnAddProdutoPedido: TSpeedButton
          Left = 3
          Top = 3
          Width = 59
          Height = 41
          Caption = 'Adicionar'
          Flat = True
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = []
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
            FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
            FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
            007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
            7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
            99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
            99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
            99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
            93337FFFF7737777733300000033333333337777773333333333}
          Layout = blGlyphTop
          NumGlyphs = 2
          ParentFont = False
          OnClick = btnAddProdutoPedidoClick
        end
        object btnRemovProdutoPedido: TSpeedButton
          Left = 3
          Top = 46
          Width = 59
          Height = 41
          Caption = 'Remover'
          Flat = True
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = []
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
            3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
            03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
            33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
            0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
            3333333337FFF7F3333333333000003333333333377777333333}
          Layout = blGlyphTop
          NumGlyphs = 2
          ParentFont = False
          OnClick = btnRemovProdutoPedidoClick
        end
      end
      object DBGrid1: TDBGrid
        Left = 2
        Top = 2
        Width = 554
        Height = 90
        Align = alClient
        Ctl3D = False
        DataSource = DS_ProdutoPedido
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ParentCtl3D = False
        TabOrder = 1
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clGreen
        TitleFont.Height = -11
        TitleFont.Name = 'Verdana'
        TitleFont.Style = []
        OnCellClick = DBGrid1CellClick
        OnDblClick = DBGrid1DblClick
        Columns = <
          item
            Expanded = False
            FieldName = 'sDescProduto'
            Title.Caption = 'Produto '
            Width = 205
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'sDescMaterial'
            Title.Caption = 'Material'
            Width = 197
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'quantidade'
            Title.Caption = 'Qnt.'
            Width = 49
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'valor_unitario'
            Title.Caption = 'Vl.Unit'
            Width = 60
            Visible = True
          end>
      end
    end
  end
  inherited QR_Padrao: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'SELECT * FROM TB_PEDIDO')
    Left = 256
    Top = 80
  end
  inherited DS_Padrao: TDataSource
    Left = 328
    Top = 80
  end
  object QR_Cliente: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_CLIENTE'
      'ORDER BY RAZAO')
    Left = 550
    Top = 8
  end
  object QR_Marca: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_MARCA')
    Left = 550
    Top = 56
  end
  object QR_CondPagamento: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_CONDICAO_PAGAMENTO')
    Left = 550
    Top = 152
  end
  object QR_Material: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_MATERIAL')
    Left = 363
    Top = 600
  end
  object DS_Cliente: TDataSource
    DataSet = QR_Cliente
    Left = 606
    Top = 8
  end
  object DS_Marca: TDataSource
    DataSet = QR_Marca
    Left = 614
    Top = 56
  end
  object DS_CondPagamento: TDataSource
    DataSet = QR_CondPagamento
    Left = 654
    Top = 216
  end
  object DS_Material: TDataSource
    DataSet = QR_Material
    Left = 379
    Top = 568
  end
  object DS_ProdutoPedido: TDataSource
    DataSet = QR_ProdutoPedido
    Left = 184
    Top = 584
  end
  object QR_Representante: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_REPRESENTANTE'
      'ORDER BY NOME')
    Left = 550
    Top = 106
  end
  object DS_Representante: TDataSource
    DataSet = QR_Representante
    Left = 614
    Top = 106
  end
  object QR_Produto: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_PRODUTO')
    Left = 419
    Top = 61
  end
  object DS_Produto: TDataSource
    DataSet = QR_Produto
    Left = 467
    Top = 61
  end
  object QR_Temp: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <
      item
        Size = -1
        Value = Null
      end>
    Left = 75
    Top = 592
  end
  object QR_ProdutoPedido: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    AfterOpen = QR_ProdutoPedidoAfterOpen
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_PRODUTO_PEDIDO')
    Left = 215
    Top = 529
    object QR_ProdutoPedidocd_produto_pedido: TAutoIncField
      FieldName = 'cd_produto_pedido'
      ReadOnly = True
    end
    object QR_ProdutoPedidocd_produto: TIntegerField
      FieldName = 'cd_produto'
    end
    object QR_ProdutoPedidoquantidade: TIntegerField
      FieldName = 'quantidade'
    end
    object QR_ProdutoPedidosDescProduto: TStringField
      FieldKind = fkLookup
      FieldName = 'sDescProduto'
      LookupDataSet = QR_Produto
      LookupKeyFields = 'cd_produto'
      LookupResultField = 'descricao'
      KeyFields = 'cd_produto'
      Lookup = True
    end
    object QR_ProdutoPedidosDescMaterial: TStringField
      FieldKind = fkLookup
      FieldName = 'sDescMaterial'
      LookupDataSet = QR_Material
      LookupKeyFields = 'cd_material'
      LookupResultField = 'descricao'
      KeyFields = 'cd_material1'
      Lookup = True
    end
    object QR_ProdutoPedidocd_pedido: TWideStringField
      FieldName = 'cd_pedido'
      Size = 50
    end
    object QR_ProdutoPedidovalor_unitario: TFloatField
      FieldName = 'valor_unitario'
    end
    object QR_ProdutoPedidocd_material1: TIntegerField
      FieldName = 'cd_material1'
    end
    object QR_ProdutoPedidocd_material2: TIntegerField
      FieldName = 'cd_material2'
    end
    object QR_ProdutoPedidocd_material3: TIntegerField
      FieldName = 'cd_material3'
    end
    object QR_ProdutoPedidocd_material4: TIntegerField
      FieldName = 'cd_material4'
    end
    object QR_ProdutoPedidocd_material5: TIntegerField
      FieldName = 'cd_material5'
    end
    object QR_ProdutoPedidocor_silk1: TWideStringField
      FieldName = 'cor_silk1'
      Size = 50
    end
    object QR_ProdutoPedidocor_silk2: TWideStringField
      FieldName = 'cor_silk2'
      Size = 50
    end
    object QR_ProdutoPedidocor_silk3: TWideStringField
      FieldName = 'cor_silk3'
      Size = 50
    end
    object QR_ProdutoPedidocor_silk4: TWideStringField
      FieldName = 'cor_silk4'
      Size = 50
    end
    object QR_ProdutoPedidocor_silk5: TWideStringField
      FieldName = 'cor_silk5'
      Size = 50
    end
    object QR_ProdutoPedidosn_relevo: TBooleanField
      FieldName = 'sn_relevo'
    end
    object QR_ProdutoPedidocd_cor_espumex: TIntegerField
      FieldName = 'cd_cor_espumex'
    end
    object QR_ProdutoPedidoquantidade_restante: TIntegerField
      FieldName = 'quantidade_restante'
    end
    object QR_ProdutoPedidods_tamanho_produto: TWideStringField
      FieldName = 'ds_tamanho_produto'
      Size = 50
    end
    object QR_ProdutoPedidocd_desconto: TIntegerField
      FieldName = 'cd_desconto'
    end
    object wdstrngfldQR_ProdutoPedidods_cor_relevo: TWideStringField
      FieldName = 'ds_cor_relevo'
      Size = 50
    end
    object QR_ProdutoPedidoobs: TMemoField
      FieldName = 'obs'
      BlobType = ftMemo
    end
    object QR_ProdutoPedidocd_tipo_corte: TIntegerField
      FieldName = 'cd_tipo_corte'
    end
    object wdstrngfldQR_ProdutoPedidods_largura: TWideStringField
      FieldName = 'ds_largura'
      Size = 50
    end
    object wdstrngfldQR_ProdutoPedidods_comprimento: TWideStringField
      FieldName = 'ds_comprimento'
      Size = 50
    end
    object QR_ProdutoPedidosn_repeticao: TBooleanField
      FieldName = 'sn_repeticao'
    end
    object QR_ProdutoPedidovalor_representante: TFloatField
      FieldName = 'valor_representante'
    end
    object QR_ProdutoPedidoqtd_tiras: TIntegerField
      FieldName = 'qtd_tiras'
    end
    object QR_ProdutoPedidotamanho_tira: TBCDField
      FieldName = 'tamanho_tira'
      Precision = 18
      Size = 2
    end
    object QR_ProdutoPedidods_identificacao: TWideStringField
      FieldName = 'ds_identificacao'
      Size = 50
    end
    object QR_ProdutoPedidocor_silk6: TWideStringField
      FieldName = 'cor_silk6'
      Size = 50
    end
  end
  object QR_Cor_Espumex: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    AfterOpen = QR_ProdutoPedidoAfterOpen
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_COR_ESPUMEX')
    Left = 255
    Top = 529
  end
  object DS_Cor_Espumex: TDataSource
    DataSet = QR_Cor_Espumex
    Left = 280
    Top = 584
  end
  object QR_Modalidade: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_MODALIDADE')
    Left = 494
    Top = 202
  end
  object DS_Modalidade: TDataSource
    DataSet = QR_Modalidade
    Left = 558
    Top = 202
  end
  object QR_ProdutoMaterial: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_MATERIAL'
      'ORDER BY DESCRICAO')
    Left = 339
    Top = 528
    object QR_ProdutoMaterialcd_material: TAutoIncField
      FieldName = 'cd_material'
      ReadOnly = True
    end
    object QR_ProdutoMaterialdescricao: TWideStringField
      FieldName = 'descricao'
      Size = 50
    end
    object QR_ProdutoMaterialcor: TWideStringField
      FieldName = 'cor'
      Size = 50
    end
  end
  object DS_ProdutoMaterial: TDataSource
    DataSet = QR_ProdutoMaterial
    Left = 459
    Top = 600
  end
  object QR_Desconto: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_DESCONTO')
    Left = 294
    Top = 530
  end
  object DS_Desconto: TDataSource
    DataSet = QR_Desconto
    Left = 422
    Top = 594
  end
  object QR_TipoCorte: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_TIPO_CORTE'
      '')
    Left = 238
    Top = 202
  end
  object DS_TipoCorte: TDataSource
    DataSet = QR_TipoCorte
    Left = 302
    Top = 202
  end
end
